Módulo 1: Introdução ao R
PROFESP, DEMSP, MS
Aula 10 - Correção exercícios
Aula 11 - Introdução ao mundo dos gráficos
Aula 12 - Fim do módulo e apresentação da tarefa
O primeiro relatório automatizado
Desafio:
Hashtag: Qual a diferença dele (#) na parte do texto e dentro dos chunks de código?
Código inline: Há outro tipo de escrita de código em R no script sem ser dentro dos chunks. Consegue encontrá-lo?
Erros
Vamos ao R-Studio!
Porque nesse caso não foi preciso se preocupar com o caminho do arquivo no seu computador? Ou seja, porque não precisamos nos preocupar onde a sessão de R está rodando?
Vamos importar agora um dado do disco fazendo testes como se pede na aula.
[1] "/Users/carolinamusso/Desktop/Sustento/cmusso86.github.io/R_tras_pra_Frente/Aula10_correcao_exercicios"
[Município] Cód. IBGE UF Região Fabricante
1 Abadia De Goiás 520005 GO Centro-Oeste BUTANTAN/SINOVAC
2 Abadia De Goiás 520005 GO Centro-Oeste FIOCRUZ/ASTRAZENECA
3 Abadia De Goiás 520005 GO Centro-Oeste JANSSEN
4 Abadia De Goiás 520005 GO Centro-Oeste PFIZER/BIONTECH
5 Abadia Dos Dourados 310010 MG Sudeste BUTANTAN/SINOVAC
6 Abadia Dos Dourados 310010 MG Sudeste FIOCRUZ/ASTRAZENECA
Total de doses aplicadas 1ª Dose D1 2ª Dose D2 Dose Adicional DA
1 7313 4030 3276 1
2 7387 3792 3585 3
3 200 0 0 8
4 9899 4920 3325 48
5 2701 1395 1299 1
6 5475 2798 2670 0
Dose Reforço DR Dose Única DU
1 6 0
2 7 0
3 26 166
4 1606 0
5 6 0
6 7 0
Como ler o arquivo de uma pasta “acima”.
Aplique a função sqrt() que calcula a raiz quadrada no vetor numérico e salve o resultado em um objeto com o nome de sua preferência.
Como posso observar esses objetos. Cite pelo menos duas formas diferentes.
Corrija o comando abaixo para criar um vetor de caracteres com o nome dessas pessoas.
Corrija o comando abaixo para criar um vetor de caracteres com o nome dos colegas.
Use a funçao class() para verificar os tipos de vetores criados até agora
[1] "numeric"
[1] "numeric"
[1] "character"
Observe os tipos de objetos criados até agora na aba Environment. Descreva o que pode ser obtido de informação nessas abas.
Use a função sum() para calcular a soma dos valores do vetor numérico criado anteriormente. Basta dar o nome do vetor numérico como argumento para essa função. Note que ela só aceita vetores numéricos, afinal, não é possível somar nomes.
Descubra (pode ser no google ou com o coleguinha) qual a função para calcular a média dos valores do mesmo vetor. É importante exercitar essa capacidade de busca, mesmo que não tenhamos visto ainda essa função em aula.
Use a função class() para verificar o tipo de objeto que é o “who_bruto” criado no início desse script.
Use a função dim() no mesmo objeto. Você consegue descobrir o que essa função fez?
Use o atributo do R base $ para salvar a coluna New_Cases do objeto who_bruto em um novo objeto com um nome de sua preferência.
Abaixo, o código cria um gráfico e o salva como uma figura em .png. Como que ele sabe que objeto salvar, se não criei um objeto e nem dei o nome desse objeto?
ggplot(who_trat)+
geom_bar(aes(x=Country, y=Acumulado), stat="identity",
color="black", fill="orange")+
coord_flip()+
theme_classic()A função abaixo gera um erro. Tente descobrir o que aconteceu e como corrigir.
Salve o gráfico em uma largura maior. Dica procure a ajuda do ggsave para ver os parâmetros dessa função.
Identifique a parte do código abaixo que está exportando a tabela para o disco e diga em qua formato ela está sendo exportada.
Tab1 <- who_trat %>%
flextable() %>%
width(width=2) %>%
style(pr_t=fp_text(font.size=13,
font.family='Calibri'), part="body")%>%
style(pr_t=fp_text(font.size=13,
font.family='Calibri'), part="header")%>%
bold(part="header")%>%
bold(part="body", j=1)%>%
hline( border=fp_border(color="black", width = 0.5))%>%
align( align = "center", part = "all")%>%
bg(bg="orange", part="header") %>%
save_as_docx(Tab1,path="Tab1.docx")